local char = owner.Character

local tabs = {}
local vol = 0

local sound = Instance.new("Sound")
sound.Name = "CrapVis"
sound.Volume = 1.5
sound.Looped = true
sound.SoundId = "rbxassetid://12489148247"
sound.Parent = char.Head
sound:Play()

owner.Chatted:Connect(function(msg)
    if msg:sub(1, 3) == "/e " then
        msg = msg:sub(4)
    end
    if msg:sub(1, 3) == "/id" then
        if msg:sub(5) and msg:sub(5) ~= " " then
            local n = tonumber(msg:sub(5))
            sound.SoundId = "rbxassetid://" .. n
        end
    elseif msg:sub(1, 4) == "/vol" then
        if msg:sub(6) and msg:sub(6) ~= " " then
            local n = tonumber(msg:sub(6))
            sound.Volume = n
        end
    elseif msg:sub(1, 5) == "/tpos" then
        if msg:sub(7) and msg:sub(7) ~= " " then
            local n = tonumber(msg:sub(7))
            sound.TimePosition = n
        end
    end
end)

local cyl = Instance.new("Part")
cyl.Name = "Cylinder"
cyl.Color = Color3.new()
cyl.Size = Vector3.new(0.05, 9, 9)
cyl.CanCollide = false
cyl.Locked = true
cyl.Massless = true
cyl.Material = "Neon"
cyl.Shape = "Cylinder"
cyl.Parent = script

local cylWeld = Instance.new("Weld")
cylWeld.Part0 = char.HumanoidRootPart
cylWeld.Part1 = cyl
cylWeld.Parent = cyl
cylWeld.C0 = CFrame.new(0, -3, 0) * CFrame.Angles(0, 0, math.pi / 2)

for i = 1, 30 do
    local part = Instance.new("Part")
    part.Name = "Tab"
    part.Color = Color3.new()
    part.Size = Vector3.new(1, 0.05, 0.05)
    part.CanCollide = false
    part.Locked = true
    part.Massless = true
    part.Material = "Neon"
    part.Parent = script
    table.insert(tabs,part)

    local weld = Instance.new("Weld")
    weld.Part0 = char.HumanoidRootPart
    weld.Part1 = part
    weld.Parent = part
end

local rot = 0
local volsine = 0
local x = 0

game:GetService("RunService").Stepped:Connect(function()
    rot = rot + 0.001

    volsine = volsine + vol

    cyl.Color = cyl.Color:Lerp(Color3.fromRGB(0, vol/5, vol/5), 0.04)

    pcall(function()
        for i,tab in pairs(tabs) do
            x = math.sin(0.5 * math.rad(math.pi + 1/#tabs + i + volsine/1200))
            tab.Size = tab.Size:Lerp(Vector3.new(1, 0.2 + math.sin(math.rad(volsine/50) + i * math.pi/5)^6 * vol/45, 0.05), 0.5)
            tab.Color = tab.Color:Lerp(Color3.fromRGB(0, vol/5, vol/5), 0.2)
            tab:FindFirstChildOfClass("Weld").C0 = tab:FindFirstChildOfClass("Weld").C0:Lerp(
                CFrame.new(0, -3, 0) *
                CFrame.Angles(-math.pi / 2, 0, 0) *
                CFrame.Angles(0, 0, (rot * math.rad(math.rad(volsine) + vol)/80) + math.rad(i * 360/#tabs)) * 
                CFrame.new(0, 5 + (tab.Size.Y/2), 0), 0.9
            )
        end
    end)

    if x < 0 then volsine = 0 end
end)

local remf = Instance.new("RemoteFunction")
remf.Name = "VolRep"
remf.OnServerInvoke = function(plr, pbl)
    vol = pbl
end
remf.Parent = char

NLS([[
char = owner.Character
song = char.Head:WaitForChild("CrapVis")
remf = char:WaitForChild("VolRep")

game:GetService("RunService").RenderStepped:Connect(function()
    pcall(function()
        remf:InvokeServer(song.PlaybackLoudness)
    end)
end)]],char)